TITLE: 

TYPE: 
SYMBOLS. : 

CAPACITY: 
DURATION: 
METHOD OF USE: 



PARAMETERS: 



MATRIX TAPE: 



PURPOSE: 



UNIVERSITY OF ILLINOIS 
DIGITAL COMPUTER LABORATORY 
'STATISTICAL LIBRARY 

KSL 1.53 - 273 

Extraction of the element with largest absolute value from 

each row of a matrix for use as communalities estimates 

Entire program 

d - decimal digits in each element of the matrix 

n - order of the matrix 

1 < d < 9; 2 < n < 900 



n (.002d + .006) + n(.019d + .053) seconds 



1. Master tape 

2. Parameters 

3. Matrix tape 



Stops 
31+00S 
2^027 
2^00S 



At stop 2^00S additional problems can be run by repeating 

steps 2 and 3« 

There are two parameters separated by fifth-hole characters 

in the following order: 

d space n space 

The data tape consists of n(n + l)/2 signed fractions in 

triangular form as follows: 



r ll' r 21' r 22' 



v nn' 



The purpose of this routine is to select the largest element 
in absolute value (excluding the diagonal entry) from each 
row of the matrix to be factored. These are punched to d 
digits with a carriage return after each element and an N 
terminating symbol. For a large matrix in triangular form, 
it is difficult to select these values by inspection. 
The rationale for using this selection as communalities 
estimates is that the length of a test vector can be estimated 
by its projection on the vector closest to it. Thurstone 
states that this "simple method of estimating communalities 
is useful only for large correlation matrices." 
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NOTE 1: 



NOTE 2: 



NOTE 3: 



( Multiple Factor Analysis, Thurstone, L. L., page 300). 
A stop on FFOOO from location 0^3 indicates that a sum 
check failure in reading the .master tape has occurred. 
A stop on FF001 indicates that the parameter d > 10. By- 
moving the -white switch up and down, a new parameter can 
be read. 

A stop on FF002 indicates that a sign digit is out-of -place. 
By moving the white switch up and down, the reading of the 
matrix will "be continued. 



ns 



DATE December 9, 1959 

SUBMITTED BY 4ju*» ljP& hLcJk** *. *o 



APPROVED BY 




/£h*<fld& 



±J- 



L6CATI0N 



Abs. 

7 
8 

9 

10 

11 



Rel* 



Sym 



31 



(1) 



10 



20 



ORDER 



007K 

80F OOF 
OOF 0Q100F 
12135F 4lF 
OOF 0010F 



by 8(1) 



*y 13 d) 



jfrom 65,66 



OOK 

191F 401F 

L56L 428L J 

4lF 9259F I 

8l4F 225L 

9l4F 325L j 

260L 50F I 

74lOF S56F j 

40F 264L 

L5F 42F I 

F58L 428L 

1 
L51F L4lF I 

401F 362L j 

L58F 42l4L j 

IA7F 429F I 

i 

92135F 4lF [by 12L 

F5l4L 42l4L I 

L09F 3214L 

L58F 4219(2) 

4l3F 4l4F 

503F L56F I 

002F 4220(2) j 
1 
0020F 462(2) 

L510F L06F 

0022F 4620(2) 

L56F L010F 

3627L 4l6F 

24(2) OOF 
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1. 



«w9RSSSa*H 



11 - order of matrix 
location of communalities 



Read parameters 



store d, n 



Clear previous communalities 



Set d 



Set (10 - d) 



2402' 



LOCATION 



Abs. 



39 



50 



59 



65 



Rel. 



27 



Sym 



(2) 



10 
11 



20 



26 



ORDER 



FF1F 26L 

OOK 

8l^F L010F 
362L FF2F 
8lF ^05F 
L53F LO^F 
Ij-OF L3F 
3216L L58F 
L^3F i+29L 
i^211L L58F 
IMF ^212L 
^21^L L5F 
L05F 3212L 
L55F ^OF 
2212L L5F 
L05F 3615L 
L55F ^OF 
F5^F *4-2*4-F 
26L 1+llj-F 
F53F I+23F 
L07F 36L 
926^2F L5F 
OOF 82F 
92131F 92515F 
F519L ^219L 
F56F ^26F 
L07F 3619L 
92770F 92135F 
921001F 2Ml) 

OOK 

L3F 3Ml) 
FFF 26(1) 
L8627FTK 3839F 
26L 26lN 



by 21(1) 



by 17(1) 
by 23,20(1) 
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FF001: d > 10 



FF002: no sign 



Test for diagonal 



Test row i 



Test row j 



Punch + sign and d digits 



End at 2^00S 



Sum check 



